home *** CD-ROM | disk | FTP | other *** search
/ AMIGA-CD 2 / Amiga-CD - Volume 2.iso / ungepackte_daten / 1993 / 4 / 02 / tips & tricks / watchclock.c < prev    next >
Encoding:
C/C++ Source or Header  |  1995-06-01  |  967 b   |  33 lines
  1. /*
  2.  * WatchClock.c
  3.  * Aufruf mit DICE: dcc GuardClock.c -o GuardClock
  4.  */
  5.  
  6. #include <dos/dos.h>
  7. #include <exec/types.h>
  8. #include <clib/macros.h>
  9.  
  10. #define FILENAME "S:WatchClock.dat"
  11.  
  12. main()
  13. {
  14.   LONG tm_now[3],dys_now,dys_last,result=0;
  15.   BPTR *file;
  16.  
  17.   if (file=(APTR)Open(FILENAME,MODE_READWRITE)) { /* Data-File öffnen */
  18.     DateStamp(&tm_now);               /* aktuelle Zeit holen */
  19.     dys_now=tm_now[0];               /* Tage seit 1.1.1978 */
  20.     if (Read(file,&dys_last,4)) {    /* Data-File auslesen */
  21.       if( ABS(dys_now-dys_last) > 30*3 ) {      /* Uhr verstellt ? */
  22.         puts("Vorsicht, Uhr könnte verstellt sein !");
  23.         result=5;
  24.       } else {  /* wenn nicht, */
  25.         Seek(file,0,OFFSET_BEGINNING);   /* aktuelle Zeit in Data-File */
  26.         Write(file,&dys_now,4);          /* schreiben */
  27.       }
  28.     } else Write(file,&dys_now,4);
  29.     Close(file);
  30.   } else puts("Die Datei S:WatchClock.dat ließ sich nicht anlegen");
  31.   exit(result);
  32. }
  33.